function update_time_avg_stats()
% Funcion:   update_time_avg_stats
% Proposito: Actualiza los acumuladores estadisticos para las 
%            areas en el calculo de tiempos medios
%
global Q_LIMIT;
global BUSY;
global IDLE;

global next_event_type;
global num_custs_delayed;
global num_delays_required;
global num_events;
%newqueue
global num_in_q;
global num_in_q2;
global server_status;
global server_status2;


global area_num_in_q;
global area_server_status;
global mean_interarrival;
global mean_service;
global time;
global time_arrival;
global time_last_event;
global time_next_event;
global total_of_delays;

% Computa el tiempo desde el ultimo evento
% y actualiza el markador de teiempo del
% ultimo evento.

%En realidad , en time_last_event esta contemplando el evento depart-
%arrive2 pero no calienta num_in_q + num_in_q2 se mantiene constante -> la
%integral da bien.
time_since_last_event = time - time_last_event;
time_last_event       = time;

% Actualiza el area bajo la curva de numero en cola
area_num_in_q = area_num_in_q + (num_in_q+num_in_q2) * time_since_last_event;

% Actualiza el area bajo la curva de la funcio de servidor-ocupado
%Si estan las 2 colas ocupados suma *2
area_server_status = area_server_status + (server_status+server_status2) * time_since_last_event;
%fprintf('\nbusy: %d\n', BUSY);
%fprintf('idle; %d\n\n', IDLE);

%fprintf(' cola1: %d , cola2: %d \n',num_in_q+server_status,num_in_q2+server_status2); 

return;